home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Extras / Development / RKM_Companion_v2.04 / Keymap / d.asm < prev    next >
Encoding:
Assembly Source File  |  1999-10-27  |  24.4 KB  |  661 lines
  1. *
  2. * Copyright (c) 1992-1999 Amiga, Inc.
  3. * 
  4. * This example is provided in electronic form by Amiga, Inc. for 
  5. * use with the "Amiga ROM Kernel Reference Manual: Devices", 3rd Edition, 
  6. * published by Addison-Wesley (ISBN 0-201-56775-X).
  7. * 
  8. * The "Amiga ROM Kernel Reference Manual: Devices" contains additional 
  9. * information on the correct usage of the techniques and operating system 
  10. * functions presented in these examples.  The source and executable code 
  11. * of these examples may only be distributed in free electronic form, via 
  12. * bulletin board or as part of a fully non-commercial and freely 
  13. * redistributable diskette.  Both the source and executable code (including 
  14. * comments) must be included, without modification, in any copy.  This 
  15. * example may not be published in printed form or distributed with any
  16. * commercial product.  However, the programming techniques and support
  17. * routines set forth in these examples may be used in the development
  18. * of original executable software products for Amiga computers.
  19. * 
  20. * All other rights reserved.
  21. * 
  22. * This example is provided "as-is" and is subject to change; no
  23. * warranties are made.  All use is at your own risk. No liability or
  24. * responsibility is assumed.
  25. *
  26. **********************************************************************
  27. *
  28. *   d.asm - d (GERMAN) A2000 key map
  29. *
  30. **********************************************************************
  31.  
  32.     section    code
  33.  
  34.  
  35. **   Assemble and then link without startup code or linker libs
  36.  
  37. *------ Included Files -----------------------------------------------
  38.         INCLUDE         "exec/types.i"
  39.         INCLUDE         "devices/keymap.i"
  40. *---------------------------------------------------------------------
  41.         DC.L    0,0             ; ln_Succ, ln_Pred
  42.         DC.B    0,0             ; ln_Type, ln_Pri
  43.         DC.L    KMName          ; ln_Name
  44.         DC.L    KMLowMapType
  45.         DC.L    KMLowMap
  46.         DC.L    KMLCapsable
  47.         DC.L    KMLRepeatable
  48.         DC.L    KMHighMapType
  49.         DC.L    KMHighMap
  50.         DC.L    KMHCapsable
  51.         DC.L    KMHRepeatable
  52. *------ Key Translation Table ----------------------------------------
  53. *  Raw key codes
  54. *
  55. *  45   50  51  52  53  54   55  56  57  58  59
  56. *  00   01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 41  46  5F    5A  5B  5C  5D
  57. *  42    10 11 12 13 14 15 16 17 18 19 1A 1B   44            3D  3E  3F  4A
  58. *  63 62  20 21 22 23 24 25 26 27 28 29 2A 2B        4C      2D  2E  2F  5E
  59. *  60 30   31 32 33 34 35 36 37 38 39 3A     61   4F 4D 4E   1D  1E  1F  43
  60. *     64  66                40             67 65             0F      3C
  61. *
  62. *---------------------------------------------------------------------
  63. *  German (D) mapping
  64. *
  65. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  66. *  `~   1! 2" 3S 4$ 5% 6& 7/ 8( 9) 0= B? '` \| BS  DEL HELP  [{  ]}  /   *
  67. *  TAB   qQ wW eE rR tT zZ uU iI oO pP uU +*  RET            7   8   9   -
  68. *  CT CL  aA sS dD fF gG hH jJ kK lL oO aA #^        UC      4   5   6   +
  69. *  SH <>   yY xX cC vV bB nN mM ,; .: -_     SH   LC DC RC   1   2   3   ENT
  70. *     ALT AM              SPACE            AM ALT            0       .
  71. *
  72. *---------------------------------------------------------------------
  73. *   For comparison, here's the USA1 mapping
  74. *
  75. *  ESC  F1  F2  F3  F4  F5   F6  F7  F8  F9  F10
  76. *  `~   1! 2@ 3# 4$ 5% 6^ 7& 8* 9( 0) -_ =+ \| BS  DEL HELP  ((  ))  //  **
  77. *  TAB   qQ wW eE rR tT yY uU iI oO pP [{ ]}  RET            77  88  99  --
  78. *  CT CL  aA sS dD fF gG hH jJ kK lL ;: '" [2B]      UC      44  55  66  ++
  79. *  SH [30] zZ xX cC vV bB nN mM ,< .> /?     SH   LC DC RC   11  22  33 ENT
  80. *     ALT AM              SPACE            AM ALT            00      ..
  81. *
  82. *--------------------------------------------------------------------------
  83. *
  84. *       40      Space
  85. *       41      Backspace
  86. *       42      Tab
  87. *       43      Enter
  88. *       44      Return
  89. *       45      Escape
  90. *       46      Delete
  91. *       4A      Numeric Pad -
  92. *       4C      Cursor Up
  93. *       4D      Cursor Down
  94. *       4E      Cursor Forward
  95. *       4F      Cursor Backward
  96. *
  97. *       50-59   Function keys F1-F10
  98. *       5A      Numeric Pad [{  (A2000)
  99. *       5B      Numeric Pad ]}  (A2000)
  100. *       5C      Numeric Pad /   (A2000)
  101. *       5D      Numeric Pad *   (A2000)
  102. *       5E      Numeric Pad +   (A2000)
  103. *       5F      Help
  104. *
  105. *       60      Left Shift
  106. *       61      Right Shift
  107. *       62      Caps Lock
  108. *       63      Control
  109. *       64      Left Alt
  110. *       65      Right Alt
  111. *       66      Left Amiga
  112. *       67      Right Amiga
  113. *
  114. *       68      Left Mouse Button (not converted)
  115. *       69      Right Mouse Button (not converted)
  116. *       6A      Middle Mouse Button (not converted)
  117. *
  118. *---------------------------------------------------------------------
  119. KMLCapsable: ; NL means NULL (undefined) and RE means RESERVED
  120.         DC.B    %00000000       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  121.         DC.B    %00000000       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  122.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  123.         DC.B    %00000111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  124.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  125.         DC.B    %00000111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  126.         DC.B    %11111110       ; mM nN bB vV cC xX yY <>  37 - 30
  127.         DC.B    %00000000       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  128.  
  129. KMHCapsable:
  130.         DC.B    %00000000       ; 47 - 40
  131.         DC.B    %00000000       ; 4F - 48
  132.         DC.B    %00000000       ; 57 - 50
  133.         DC.B    %00000000       ; 5F - 58
  134.         DC.B    %00000000       ; 67 - 60
  135.         DC.B    %00000000       ; 6F - 68
  136.         DC.B    %00000000       ; 77 - 70
  137. KMLRepeatable:
  138.         DC.B    %11111111       ; 7\ 6& 5% 4$ 3s 2" 1! []  07 - 00
  139.         DC.B    %10111111       ; 0N NL \| '` B? 0= 9) 8(  0F - 08
  140.         DC.B    %11111111       ; iI uU zZ tT rR eE wW qQ  17 - 10
  141.         DC.B    %11101111       ; 3N 2N 1N NL +* UU pP oO  1F - 18
  142.         DC.B    %11111111       ; kK jJ hH gG fF dD sS aA  27 - 20
  143.         DC.B    %11101111       ; 6N 5N 4N NL #' AA OO lL  2F - 28
  144.         DC.B    %11111111       ; mM nN bB vV cC xX yY <>  37 - 30
  145.         DC.B    %11110111       ; 9N 8N 7N .N NL -_ .: ,;  3F - 38
  146. KMHRepeatable:
  147.         DC.B    %01000111       ; 47 - 40
  148.         DC.B    %11110100       ; 4F - 48
  149.         DC.B    %11111111       ; 57 - 50
  150.         DC.B    %01111111       ; 5F - 58
  151.         DC.B    %00000000       ; 67 - 60
  152.         DC.B    %00000000       ; 6F - 68
  153.         DC.B    %00000000       ; 77 - 70
  154. KMLowMapType:
  155.         DC.B    KC_VANILLA              ; []            $00
  156.         DC.B    KCF_SHIFT+KCF_ALT       ; 1!
  157.         DC.B    KCF_SHIFT+KCF_ALT       ; 2"
  158.         DC.B    KCF_SHIFT+KCF_ALT       ; 3s
  159.         DC.B    KCF_SHIFT+KCF_ALT       ; 4$
  160.         DC.B    KCF_SHIFT+KCF_ALT       ; 5%
  161.         DC.B    KC_VANILLA              ; 6&
  162.         DC.B    KCF_SHIFT+KCF_ALT       ; 7/
  163.         DC.B    KCF_SHIFT+KCF_ALT       ; 8(            $08
  164.         DC.B    KCF_SHIFT+KCF_ALT       ; 9)
  165.         DC.B    KCF_SHIFT+KCF_ALT       ; 0=
  166.         DC.B    KC_VANILLA              ; B?
  167.         DC.B    KCF_DEAD+KCF_SHIFT+KCF_ALT ; '`
  168.         DC.B    KC_VANILLA              ; \|
  169.         DC.B    KCF_NOP                 ;NL
  170.         DC.B    KC_NOQUAL               ; 0N
  171.         DC.B    KC_VANILLA              ; qQ            $10
  172.         DC.B    KC_VANILLA              ; wW
  173.         DC.B    KCF_DEAD+KC_VANILLA     ; eE
  174.         DC.B    KC_VANILLA              ; rR
  175.         DC.B    KC_VANILLA              ; tT
  176.         DC.B    KC_VANILLA              ; zZ
  177.         DC.B    KCF_DEAD+KC_VANILLA     ; uU
  178.         DC.B    KCF_DEAD+KC_VANILLA     ; iI
  179.         DC.B    KCF_DEAD+KC_VANILLA     ; oO            $18
  180.         DC.B    KC_VANILLA              ; pP
  181.         DC.B    KC_VANILLA              ; omlatuU
  182.         DC.B    KC_VANILLA              ; +*
  183.         DC.B    KCF_NOP                 ; NL
  184.         DC.B    KC_NOQUAL               ; 1N
  185.         DC.B    KC_NOQUAL               ; 2N
  186.         DC.B    KC_NOQUAL               ; 3N
  187.         DC.B    KCF_DEAD+KC_VANILLA     ; aA            $20
  188.         DC.B    KC_VANILLA              ; sS
  189.         DC.B    KC_VANILLA              ; dD
  190.         DC.B    KCF_DEAD+KC_VANILLA     ; fF
  191.         DC.B    KCF_DEAD+KC_VANILLA     ; gG
  192.         DC.B    KCF_DEAD+KC_VANILLA     ; hH
  193.         DC.B    KCF_DEAD+KC_VANILLA     ; jJ
  194.         DC.B    KCF_DEAD+KC_VANILLA     ; kK
  195.         DC.B    KC_VANILLA              ; lL            $28
  196.         DC.B    KCF_SHIFT+KCF_ALT       ; umlotoO
  197.         DC.B    KCF_SHIFT+KCF_ALT       ; umlotaA
  198.         DC.B    KC_VANILLA              ; #^
  199.         DC.B    KCF_NOP                 ; NL
  200.         DC.B    KC_NOQUAL               ; 4N
  201.         DC.B    KC_NOQUAL               ; 5N
  202.         DC.B    KC_NOQUAL               ; 6N
  203.         DC.B    KCF_SHIFT               ; <>            $30
  204.         DC.B    KCF_DEAD+KC_VANILLA     ; yY
  205.         DC.B    KC_VANILLA              ; xX
  206.         DC.B    KC_VANILLA              ; cC
  207.         DC.B    KC_VANILLA              ; vV
  208.         DC.B    KC_VANILLA              ; bB
  209.         DC.B    KCF_DEAD+KC_VANILLA     ; nN
  210.         DC.B    KC_VANILLA              ; mM
  211.         DC.B    KCF_SHIFT+KCF_ALT       ; ,;            $38
  212.         DC.B    KCF_SHIFT+KCF_ALT       ; .:
  213.         DC.B    KC_VANILLA              ; -_
  214.         DC.B    KCF_NOP                 ; NL
  215.         DC.B    KC_NOQUAL               ; .N
  216.         DC.B    KC_NOQUAL               ; 7N
  217.         DC.B    KC_NOQUAL               ; 8N
  218.         DC.B    KC_NOQUAL               ; 9N
  219. KMHighMapType:
  220.         DC.B    KCF_DEAD+KCF_ALT        ; SPACE         $40
  221.         DC.B    KC_NOQUAL               ; BACKSPACE
  222.         DC.B    KCF_STRING+KCF_SHIFT    ; TAB
  223.         DC.B    KC_NOQUAL               ; ENTER
  224.         DC.B    KCF_CONTROL             ; RETURN
  225.         DC.B    KCF_ALT                 ; ESCAPE
  226.         DC.B    KC_NOQUAL               ; DELETE
  227.         DC.B    KCF_NOP
  228.         DC.B    KCF_NOP                 ;               $48
  229.         DC.B    KCF_NOP
  230.         DC.B    KC_NOQUAL               ; Numeric Pad -
  231.         DC.B    KCF_NOP
  232.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR UP
  233.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR DOWN
  234.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR FORWARD
  235.         DC.B    KCF_STRING+KCF_SHIFT    ; CURSOR BACKWARD
  236.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 1        $50
  237.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 2
  238.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 3
  239.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 4
  240.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 5
  241.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 6
  242.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 7
  243.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 8
  244.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 9        $58
  245.         DC.B    KCF_STRING+KCF_SHIFT    ; FKEY 10
  246.         DC.B    KCF_SHIFT+KCF_CONTROL   ; Numeric Pad [{
  247.         DC.B    KCF_SHIFT+KCF_CONTROL   ; Numeric Pad ]}
  248.         DC.B    KC_NOQUAL               ; Numeric Pad /
  249.         DC.B    KC_NOQUAL               ; Numeric Pad *
  250.         DC.B    KC_NOQUAL               ; Numeric Pad +
  251.         DC.B    KCF_STRING              ; Help
  252.         DC.B    KCF_NOP                 ; Left Shift    $60
  253.         DC.B    KCF_NOP                 ; Right Shift
  254.         DC.B    KCF_NOP                 ; Caps Lock
  255.         DC.B    KCF_NOP                 ; Control
  256.         DC.B    KCF_NOP                 ; Left Alt
  257.         DC.B    KCF_NOP                 ; Right Alt
  258.         DC.B    KCF_NOP                 ; Left Amiga
  259.         DC.B    KCF_NOP                 ; Right Amiga
  260.         DC.B    KCF_NOP                 ; Left Mouse Button $68
  261.         DC.B    KCF_NOP                 ; Right Mouse Button
  262.         DC.B    KCF_NOP                 ; Middle Mouse Button
  263.         DC.B    KCF_NOP
  264.         DC.B    KCF_NOP
  265.         DC.B    KCF_NOP
  266.         DC.B    KCF_NOP
  267.         DC.B    KCF_NOP
  268.         DC.B    KCF_NOP                 ; $70
  269.         DC.B    KCF_NOP
  270.         DC.B    KCF_NOP
  271.         DC.B    KCF_NOP
  272.         DC.B    KCF_NOP
  273.         DC.B    KCF_NOP
  274.         DC.B    KCF_NOP
  275.         DC.B    KCF_NOP
  276. KMLowMap:
  277.         DC.B    '~','`','~','`' ; `, ~, `, ~                            $00
  278.         DC.B    '!',$B9,'!','1' ; 1, !, super 1, !
  279.         DC.B    $B2,'@','"','2' ; 2, ", @, super 2
  280.         DC.B    '#',$B3,$A7,'3' ; 3, section, super 3, #
  281.         DC.B    $A2,$B0,'$','4' ; 4, $, degree, cents
  282.         DC.B    '%',$BC,'%','5' ; 5, %, 1/4, %
  283.         DC.B    '^',$BD,'&','6' ; 6, &, 1/2, ^
  284.         DC.B    '&',$BE,'/','7' ; 7, /, 3/4, &
  285.         DC.B    '*',$B7,'(','8' ; 8, (, bullet, *                       $08
  286.         DC.B    '(',$AB,')','9' ; 9, ), <<, (
  287.         DC.B    ')',$BB,'=','0' ; 0, =, >>, )
  288.         DC.B    '_','-','?',$DF ; sharp s, ?, -, _
  289.         DC.L    key0C           ; dead ', dead `, =, +
  290.         DC.B    '|','\','|','\' ; \, |, \, |
  291.         DC.L    0               ; NOP
  292.         DC.B    0,0,0,'0'       ; numeric pad 0 (0N)
  293.         DC.B    $C5,$E5,'Q','q' ; q, Q, dot a, dot A                    $10
  294.         DC.B    $B0,$B0,'W','w' ; w, W, dot, dot
  295.         DC.L    key12   ; e, E, (c), (c)
  296.         DC.B    $AE,$AE,'R','r' ; r, R, (r), (r)
  297.         DC.B    $DE,$FE,'T','t' ; t, T, thorn, THORN
  298.         DC.B    $A5,$A4,'Z','z' ; z, Z, IMS, Yen
  299.         DC.L    key16           ; u, U, micro, micro
  300.         DC.L    key17           ; i, I, inverted !, broken |
  301.         DC.L    key18           ; o, O, slash o, slash O                $18
  302.         DC.B    $B6,$B6,'P','p' ; p, P, paragraph, paragraph
  303.         DC.B    '{','[',$DC,$FC ; umlaut u, umlaut U, [, {
  304.         DC.B    '}',']','*','+' ; +, *, ], }
  305.         DC.L    0               ; NOP
  306.         DC.B    0,0,0,'1'       ; numeric pad 1 (1N)
  307.         DC.B    0,0,0,'2'       ; numeric pad 2 (2N)
  308.         DC.B    0,0,0,'3'       ; numeric pad 3 (3N)
  309.         DC.L    key20           ; a, A, ae, AE                          $20
  310.         DC.B    $A7,$DF,'S','s' ; s, S, sharp s, section
  311.         DC.B    $D0,$F0,'D','d' ; d, D, bar d, bar D
  312.         DC.L    key23           ; f, F, dead '
  313.         DC.L    key24           ; g, G, dead `
  314.         DC.L    key25           ; h, H, dead ^
  315.         DC.L    key26           ; j, J, dead ~
  316.         DC.L    key27           ; k, K, dead "
  317.         DC.B    $A3,$A3,'L','l' ; l, L, pound, pound                    $28
  318.         DC.B    ':',';',$D6,$F6 ; umlaut o, umlaut O, ;, :
  319.         DC.B    '"',$27,$C4,$E4 ; umlaut a, umlaut A, ', "
  320.         DC.B    '^','#','^','#' ; #, ^, #, ^
  321.         DC.L    0               ; NOP
  322.         DC.B    0,0,0,'4'       ; numeric pad 4 (4N)
  323.         DC.B    0,0,0,'5'       ; numeric pad 5 (5N)
  324.         DC.B    0,0,0,'6'       ; numeric pad 6 (6N)
  325.         DC.B    0,0,'>','<'     ; <, >                                  $30
  326.         DC.L    key31           ; y, Y, +/-, not
  327.         DC.B    $F7,$D7,'X','x' ; x, X, times, divide
  328.         DC.B    $C7,$E7,'C','c' ; c, C, c cedilla, C cedilla
  329.         DC.B    $AA,$AA,'V','v' ; v, V, female ordinal
  330.         DC.B    $BA,$BA,'B','b' ; b, B, male ordinal
  331.         DC.L    key36           ; n, N, SHY, overbar
  332.         DC.B    $BF,$B8,'M','m' ; m, M, cedilla, inverted ?
  333.         DC.B    '<',',',';',',' ; ,, ;, ,, <                            $38
  334.         DC.B    '>','.',':','.' ; ., :, ., >
  335.         DC.B    '?','/','_','-' ; -, _, /, ?
  336.         DC.L    0               ; NOP
  337.         DC.B    0,0,0,'.'       ; numeric pad . (.N)
  338.         DC.B    0,0,0,'7'       ; numeric pad 7 (7N)
  339.         DC.B    0,0,0,'8'       ; numeric pad 8 (8N)
  340.         DC.B    0,0,0,'9'       ; numeric pad 9 (9N)
  341. KMHighMap:
  342.         DC.L    key40                                                   $40
  343.         DC.B    0,0,0,$08
  344.         DC.L    key42
  345.         DC.B    0,0,0,$0D
  346.         DC.B    0,0,$0A,$0D
  347.         DC.B    0,0,$9B,$1B
  348.         DC.B    0,0,0,$7F
  349.         DC.L    0
  350.         DC.L    0                                                       $48
  351.         DC.L    0
  352.         DC.B    0,0,0,'-'
  353.         DC.L    0
  354.         DC.L    key4C
  355.         DC.L    key4D
  356.         DC.L    key4E
  357.         DC.L    key4F
  358.         DC.L    key50                                                   $50
  359.         DC.L    key51
  360.         DC.L    key52
  361.         DC.L    key53
  362.         DC.L    key54
  363.         DC.L    key55
  364.         DC.L    key56
  365.         DC.L    key57
  366.         DC.L    key58                                                   $58
  367.         DC.L    key59
  368.         DC.B    $1B,$1B,'{','[' ; numeric pad [, {
  369.         DC.B    $1D,$1D,'}',']' ; numeric pad ], }
  370.         DC.B    0,0,0,'/'       ; numeric pad /
  371.         DC.B    0,0,0,'*'       ; numeric pad *
  372.         DC.B    0,0,0,'+'       ; numeric pad +
  373.         DC.L    key5F
  374.         DC.L    0                                                       $60
  375.         DC.L    0
  376.         DC.L    0
  377.         DC.L    0
  378.         DC.L    0
  379.         DC.L    0
  380.         DC.L    0
  381.         DC.L    0
  382.         DC.L    0                                                       $68
  383.         DC.L    0
  384.         DC.L    0
  385.         DC.L    0
  386.         DC.L    0
  387.         DC.L    0
  388.         DC.L    0
  389.         DC.L    0
  390.         DC.L    0                                                       $70
  391.         DC.L    0
  392.         DC.L    0
  393.         DC.L    0
  394.         DC.L    0
  395.         DC.L    0
  396.         DC.L    0
  397.         DC.L    0
  398. ;------ possible dead keys
  399. key0C:
  400.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  401.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  402.         DC.B    0,'=',0,'+'                     ; =, +
  403. key23:
  404.         DC.B    0,'f',0,'F'                     ; f, F
  405.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  406.         DC.B    DPF_DEAD,1+(6<<DP_2DFACSHIFT)   ; dead '
  407.         DC.B    0,$06,0,$06,0,$86,0,$86         ; control translation
  408. key24:
  409.         DC.B    0,'g',0,'G'                     ; g, G
  410.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  411.         DC.B    DPF_DEAD,2+(6<<DP_2DFACSHIFT)   ; dead `
  412.         DC.B    0,$07,0,$07,0,$87,0,$87         ; control translation
  413. key25:
  414.         DC.B    0,'h',0,'H'                     ; h, H
  415.         DC.B    DPF_DEAD,3,DPF_DEAD,3           ; dead ^, dead ^
  416.         DC.B    0,$08,0,$08,0,$88,0,$88         ; control translation
  417. key26:
  418.         DC.B    0,'j',0,'J'                     ; j, J
  419.         DC.B    DPF_DEAD,4,DPF_DEAD,4           ; dead ~, dead ~
  420.         DC.B    0,$0A,0,$0A,0,$8A,0,$8A         ; control translation
  421. key27:
  422.         DC.B    0,'k',0,'K'                     ; k, K
  423.         DC.B    DPF_DEAD,5,DPF_DEAD,5           ; dead ", dead "
  424.         DC.B    0,$0B,0,$0B,0,$8B,0,$8B         ; control translation
  425. ;------ deadable keys (modified by dead keys)
  426. key12:                  ; e, E, (c), (c)
  427.         DC.B    DPF_MOD,key12u-key12,DPF_MOD,key12s-key12
  428.         DC.B    0,$A9,0,$A9
  429.         DC.B    0,$05,0,$05,0,$85,0,$85 ; control translation
  430. key12u:
  431.         DC.B    'e',$E9,$E8,$EA,'e',$EB
  432.         DC.B    $E9,$E9,$EA,$E9,$E9,$E9
  433.         DC.B    $E8,$EA,$E8,$E8,$E8,$E8
  434. key12s:
  435.         DC.B    'E',$C9,$C8,$CA,'E',$CB
  436.         DC.B    $C9,$C9,$CA,$C9,$C9,$C9
  437.         DC.B    $C8,$CA,$C8,$C8,$C8,$C8
  438. key16:                  ; u, U, micro, micro
  439.         DC.B    DPF_MOD,key16u-key16,DPF_MOD,key16s-key16
  440.         DC.B    0,$B5,0,$B5
  441.         DC.B    0,$15,0,$15,0,$95,0,$95 ; control translation
  442. key16u:
  443.         DC.B    'u',$FA,$F9,$FB,'u',$FC
  444.         DC.B    $FA,$FA,$FB,$FA,$FA,$FA
  445.         DC.B    $F9,$FB,$F9,$F9,$F9,$F9
  446. key16s:
  447.         DC.B    'U',$DA,$D9,$DB,'U',$DC
  448.         DC.B    $DA,$DA,$DB,$DA,$DA,$DA
  449.         DC.B    $D9,$DB,$D9,$D9,$D9,$D9
  450. key17:                  ; i, I, inverted !, broken |
  451.         DC.B    DPF_MOD,key17u-key17,DPF_MOD,key17s-key17
  452.         DC.B    0,$A1,0,$A6
  453.         DC.B    0,$09,0,$09,0,$89,0,$89 ; control translation
  454. key17u:
  455.         DC.B    'i',$ED,$EC,$EE,'i',$EF
  456.         DC.B    $ED,$ED,$EE,$ED,$ED,$ED
  457.         DC.B    $EC,$EE,$EC,$EC,$EC,$EC
  458. key17s:
  459.         DC.B    'I',$CD,$CC,$CE,'I',$CF
  460.         DC.B    $CD,$CD,$CE,$CD,$CD,$CD
  461.         DC.B    $CC,$CE,$CC,$CC,$CC,$CC
  462. key18:                  ; o, O, bar o, bar O
  463.         DC.B    DPF_MOD,key18u-key18,DPF_MOD,key18s-key18
  464.         DC.B    0,$F8,0,$D8
  465.         DC.B    0,$0F,0,$0F,0,$8F,0,$8F ; control translation
  466. key18u:
  467.         DC.B    'o',$F3,$F2,$F4,$F5,$F6
  468.         DC.B    $F3,$F3,$F4,$F3,$F3,$F3
  469.         DC.B    $F2,$F4,$F2,$F2,$F2,$F2
  470. key18s:
  471.         DC.B    'O',$D3,$D2,$D4,$D5,$D6
  472.         DC.B    $D3,$D3,$D4,$D3,$D3,$D3
  473.         DC.B    $D2,$D4,$D2,$D2,$D2,$D2
  474. key20:                  ; a, A, ae, AE
  475.         DC.B    DPF_MOD,key20u-key20,DPF_MOD,key20s-key20
  476.         DC.B    0,$E6,0,$C6
  477.         DC.B    0,$01,0,$01,0,$81,0,$81 ; control translation
  478. key20u:
  479.         DC.B    'a',$E1,$E0,$E2,$E3,$E4
  480.         DC.B    $E1,$E1,$E2,$E1,$E1,$E1 ; most recent is '
  481.         DC.B    $E0,$E2,$E0,$E0,$E0,$E0 ; most recent is `
  482. key20s:
  483.         DC.B    'A',$C1,$C0,$C2,$C3,$C4
  484.         DC.B    $C1,$C1,$C2,$C1,$C1,$C1 ; most recent is '
  485.         DC.B    $C0,$C2,$C0,$C0,$C0,$C0 ; most recent is `
  486. key36:                  ; n, N, SHY, overbar
  487.         DC.B    DPF_MOD,key36u-key36,DPF_MOD,key36s-key36
  488.         DC.B    0,$AD,0,$AF
  489.         DC.B    0,$0E,0,$0E,0,$8E,0,$8E ; control translation
  490. key36u:
  491.         DC.B    'n','n','n','n',$F1,'n'
  492.         DC.B    'n','n','n','n','n','n'
  493.         DC.B    'n','n','n','n','n','n'
  494. key36s:
  495.         DC.B    'N','N','N','N',$D1,'N'
  496.         DC.B    'N','N','N','N','N','N'
  497.         DC.B    'N','N','N','N','N','N'
  498. key31:                  ; y, Y, +/-, not
  499.         DC.B    DPF_MOD,key31u-key31,DPF_MOD,key31s-key31
  500.         DC.B    0,$B1,0,$AC
  501.         DC.B    0,$19,0,$19,0,$99,0,$99 ; control translation
  502. key31u:
  503.         DC.B    'y',$FD,'y','y','y',$FF
  504.         DC.B    $FD,$FD,$FD,$FD,$FD,$FD
  505.         DC.B    'y','y','y','y','y','y'
  506. key31s:
  507.         DC.B    'Y',$DD,'Y','Y','Y','Y'
  508.         DC.B    $DD,$DD,$DD,$DD,$DD,$DD
  509.         DC.B    'Y','Y','Y','Y','Y','Y'
  510. key40:                  ; space,,NBSP, and accents
  511.         DC.B    DPF_MOD,key40d-key40,0,$A0
  512. key40d:
  513.         DC.B    ' ',$B4,'`','^','~',$A8
  514.         DC.B    $B4,'^',$B4,$B4,$B4,$B4
  515.         DC.B    '`','`','^','`','`','`'
  516. ;------ string keys
  517. key42:
  518.         DC.B    key42ue-key42us,key42us-key42
  519.         DC.B    key42se-key42ss,key42ss-key42
  520. key42us:
  521.         DC.B    $09
  522. key42ue:
  523. key42ss:
  524.         DC.B    $9B,'Z'
  525. key42se:
  526. key4C:
  527.         DC.B    key4Cue-key4Cus,key4Cus-key4C
  528.         DC.B    key4Cse-key4Css,key4Css-key4C
  529. key4Cus:
  530.         DC.B    $9B,'A'
  531. key4Cue:
  532. key4Css:
  533.         DC.B    $9B,'T'
  534. key4Cse:
  535. key4D:
  536.         DC.B    key4Due-key4Dus,key4Dus-key4D
  537.         DC.B    key4Dse-key4Dss,key4Dss-key4D
  538. key4Dus:
  539.         DC.B    $9B,'B'
  540. key4Due:
  541. key4Dss:
  542.         DC.B    $9B,'S'
  543. key4Dse:
  544. key4E:
  545.         DC.B    key4Eue-key4Eus,key4Eus-key4E
  546.         DC.B    key4Ese-key4Ess,key4Ess-key4E
  547. key4Eus:
  548.         DC.B    $9B,'C'
  549. key4Eue:
  550. key4Ess:
  551.         DC.B    $9B,' ','@'
  552. key4Ese:
  553. key4F:
  554.         DC.B    key4Fue-key4Fus,key4Fus-key4F
  555.         DC.B    key4Fse-key4Fss,key4Fss-key4F
  556. key4Fus:
  557.         DC.B    $9B,'D'
  558. key4Fue:
  559. key4Fss:
  560.         DC.B    $9B,' ','A'
  561. key4Fse:
  562. key50:
  563.         DC.B    key50ue-key50us,key50us-key50
  564.         DC.B    key50se-key50ss,key50ss-key50
  565. key50us:
  566.         DC.B    $9B,'0~'
  567. key50ue:
  568. key50ss:
  569.         DC.B    $9B,'10~'
  570. key50se:
  571. key51:
  572.         DC.B    key51ue-key51us,key51us-key51
  573.         DC.B    key51se-key51ss,key51ss-key51
  574. key51us:
  575.         DC.B    $9B,'1~'
  576. key51ue:
  577. key51ss:
  578.         DC.B    $9B,'11~'
  579. key51se:
  580. key52:
  581.         DC.B    key52ue-key52us,key52us-key52
  582.         DC.B    key52se-key52ss,key52ss-key52
  583. key52us:
  584.         DC.B    $9B,'2~'
  585. key52ue:
  586. key52ss:
  587.         DC.B    $9B,'12~'
  588. key52se:
  589. key53:
  590.         DC.B    key53ue-key53us,key53us-key53
  591.         DC.B    key53se-key53ss,key53ss-key53
  592. key53us:
  593.         DC.B    $9B,'3~'
  594. key53ue:
  595. key53ss:
  596.         DC.B    $9B,'13~'
  597. key53se:
  598. key54:
  599.         DC.B    key54ue-key54us,key54us-key54
  600.         DC.B    key54se-key54ss,key54ss-key54
  601. key54us:
  602.         DC.B    $9B,'4~'
  603. key54ue:
  604. key54ss:
  605.         DC.B    $9B,'14~'
  606. key54se:
  607. key55:
  608.         DC.B    key55ue-key55us,key55us-key55
  609.         DC.B    key55se-key55ss,key55ss-key55
  610. key55us:
  611.         DC.B    $9B,'5~'
  612. key55ue:
  613. key55ss:
  614.         DC.B    $9B,'15~'
  615. key55se:
  616. key56:
  617.         DC.B    key56ue-key56us,key56us-key56
  618.         DC.B    key56se-key56ss,key56ss-key56
  619. key56us:
  620.         DC.B    $9B,'6~'
  621. key56ue:
  622. key56ss:
  623.         DC.B    $9B,'16~'
  624. key56se:
  625. key57:
  626.         DC.B    key57ue-key57us,key57us-key57
  627.         DC.B    key57se-key57ss,key57ss-key57
  628. key57us:
  629.         DC.B    $9B,'7~'
  630. key57ue:
  631. key57ss:
  632.         DC.B    $9B,'17~'
  633. key57se:
  634. key58:
  635.         DC.B    key58ue-key58us,key58us-key58
  636.         DC.B    key58se-key58ss,key58ss-key58
  637. key58us:
  638.         DC.B    $9B,'8~'
  639. key58ue:
  640. key58ss:
  641.         DC.B    $9B,'18~'
  642. key58se:
  643. key59:
  644.         DC.B    key59ue-key59us,key59us-key59
  645.         DC.B    key59se-key59ss,key59ss-key59
  646. key59us:
  647.         DC.B    $9B,'9~'
  648. key59ue:
  649. key59ss:
  650.         DC.B    $9B,'19~'
  651. key59se:
  652. key5F:
  653.         DC.B    key5Fe-key5Fs,key5Fs-key5F
  654. key5Fs:
  655.         DC.B    $9B,'?~'
  656. key5Fe:
  657. KMName:
  658.         DC.B    'd',0
  659. ;kmEnd
  660.         END
  661.